home *** CD-ROM | disk | FTP | other *** search
/ The Atari Compendium / The Atari Compendium (Toad Computers) (1994).iso / files / prgtools / gnustuff / tos / updates / update18.zoo / gprof / diffs
Encoding:
Text File  |  1992-03-22  |  5.0 KB  |  198 lines
  1. *** 1.6    1992/03/08 17:48:29
  2. --- Changelog    1992/03/23 01:47:27
  3. ***************
  4. *** 46,48 ****
  5. --- 46,53 ----
  6.       link in demangler
  7.   
  8.   ------------------------------- Patchlevel 5 ---------------------------
  9. + 
  10. + gprof.c:: ++jrb
  11. +     various fixes from the net. gprof -s should work better now.
  12. + 
  13. + ------------------------------- Patchlevel 6 ---------------------------
  14. *** 1.7    1992/03/08 17:48:29
  15. --- PatchLev.h    1992/03/23 01:47:27
  16. ***************
  17. *** 1,4 ****
  18. ! #define    PatchLevel "05"
  19.   
  20.   /*
  21.    *    the Patch Level above is to identify the version
  22. --- 1,4 ----
  23. ! #define    PatchLevel "06"
  24.   
  25.   /*
  26.    *    the Patch Level above is to identify the version
  27. *** 1.6    1992/03/08 17:48:29
  28. --- gprof.c    1992/03/23 01:47:29
  29. ***************
  30. *** 73,78 ****
  31. --- 73,82 ----
  32.   #  endif
  33.   #endif
  34.   
  35. + #ifdef HAVE_SETITIMER
  36. + #include <sys/time.h>
  37. + #endif
  38. + 
  39.   #include "gmon.h"
  40.   /* #include <nlist.h> */
  41.   
  42. ***************
  43. *** 772,777 ****
  44. --- 776,787 ----
  45.        
  46.     char *name = '\0';
  47.     int    ind;  
  48. + #ifndef atarist
  49. +   long int syms_offset;
  50. +   unsigned int syms_size;
  51. +   long int strs_offset;
  52. +   unsigned int strs_size;
  53. + #endif
  54.   
  55.   #ifdef atarist
  56.     _malloczero(1);
  57. ***************
  58. *** 1082,1089 ****
  59.          were called from, we fake it.  Since this is only
  60.          gonna be fed back into gprof, it doesn't matter */
  61.   #ifndef atarist
  62. !     call_tmp.from=(p->value+FUDGE_FACTOR)-hdr.low;
  63. !     call_tmp.to=(t->sym_to->value+FUDGE_FACTOR)-hdr.low;
  64.   #else
  65.       call_tmp.from=(p->value+FUDGE_FACTOR)+hdr.low;
  66.       call_tmp.to=(t->sym_to->value+FUDGE_FACTOR)+hdr.low;
  67. --- 1092,1101 ----
  68.          were called from, we fake it.  Since this is only
  69.          gonna be fed back into gprof, it doesn't matter */
  70.   #ifndef atarist
  71. !       call_tmp.from=p->value+FUDGE_FACTOR;
  72. !       call_tmp.to=t->sym_to->value+FUDGE_FACTOR;
  73. ! /*    call_tmp.from=(p->value+FUDGE_FACTOR)-hdr.low;
  74. !     call_tmp.to=(t->sym_to->value+FUDGE_FACTOR)-hdr.low; */
  75.   #else
  76.       call_tmp.from=(p->value+FUDGE_FACTOR)+hdr.low;
  77.       call_tmp.to=(t->sym_to->value+FUDGE_FACTOR)+hdr.low;
  78. ***************
  79. *** 2134,2140 ****
  80.   }
  81.   #endif /* atarist */
  82.   
  83. ! /* Return the symbol which has the largest value less than VAL.
  84.      Since the symbol vector is sorted by value, this is done
  85.      with a binary search.  */
  86.   
  87. --- 2146,2152 ----
  88.   }
  89.   #endif /* atarist */
  90.   
  91. ! /* Return the symbol which has the largest value less than or equal to VAL.
  92.      Since the symbol vector is sorted by value, this is done
  93.      with a binary search.  */
  94.   
  95. ***************
  96. *** 2149,2155 ****
  97.       if (m->value>val) {
  98.         m-=gap;
  99.         gap/=2;
  100. !     } else if ((m+1)->value<val) {
  101.         m+=gap;
  102.         gap/=2;
  103.       } else
  104. --- 2161,2168 ----
  105.       if (m->value>val) {
  106.         m-=gap;
  107.         gap/=2;
  108. !     } else if ((m+1)->value<=val) { /* *********** TEST ********* */
  109. ! /*     } else if ((m+1)->value<val) { */
  110.         m+=gap;
  111.         gap/=2;
  112.       } else
  113. ***************
  114. *** 2169,2174 ****
  115. --- 2182,2188 ----
  116.   int
  117.   badsym FUN1(struct nlist *, sym)
  118.   {
  119. +   int local;
  120.   #ifndef N_SECT
  121.     if ((sym->n_type & ~N_EXT) != N_TEXT)
  122.       return TRUE;
  123. ***************
  124. *** 2176,2185 ****
  125.     if ((sym->n_type & ~N_EXT) != N_TEXT && (sym->n_type & ~N_EXT) != N_SECT)
  126.       return TRUE;
  127.   #endif
  128. !   if (no_locals && !(sym->n_type&N_EXT))
  129.       return TRUE;
  130.     /* Filenames or pascal labels should be ignored */
  131. !   if (index (sym->n_un.n_name, '.') || index (sym->n_un.n_name, '$'))
  132.       return TRUE;
  133.     return FALSE;
  134.   }
  135. --- 2190,2206 ----
  136.     if ((sym->n_type & ~N_EXT) != N_TEXT && (sym->n_type & ~N_EXT) != N_SECT)
  137.       return TRUE;
  138.   #endif
  139. !   local = !(sym->n_type&N_EXT);
  140. !   if (no_locals && !local)
  141.       return TRUE;
  142.     /* Filenames or pascal labels should be ignored */
  143. ! if (local
  144. !     && (index (sym->n_un.n_name, '.')
  145. !       || index (sym->n_un.n_name, '$')
  146. ! #ifndef nounderscore
  147. !       || sym->n_un.n_name[0] != '_'
  148. ! #endif
  149. !       ))
  150.       return TRUE;
  151.     return FALSE;
  152.   }
  153. ***************
  154. *** 2410,2415 ****
  155. --- 2431,2455 ----
  156.       fputs (blurb, stdout);
  157.   }
  158.   
  159. + #ifdef HAVE_SETITIMER
  160. + 
  161. + get_ticks()
  162. + {
  163. +   struct itimerval tim;
  164. +   
  165. +   tim.it_interval.tv_sec = 0;
  166. +   tim.it_interval.tv_usec = 1;
  167. +   timerclear(&tim.it_value);
  168. +   if (setitimer(ITIMER_REAL, &tim, 0) < 0
  169. +       || setitimer(ITIMER_REAL, 0, &tim) < 0) {
  170. +     fprintf(stderr, "%s: setitimer: ", myname);
  171. +     perror((char *)0);
  172. +     exit(1);
  173. +   }
  174. +   return 1000000/tim.it_interval.tv_usec;
  175. + }
  176. + 
  177. + #else /* not HAVE_SETITIMER */
  178.   
  179.   /* Find the number of clock ticks/second by reading the kernel's memory.
  180.      This means that if /dev/kmem isn't readable, this program will have to run
  181. ***************
  182. *** 2446,2452 ****
  183.     PRINT_OBNOXIOUS_DEBUG_MESSAGE (DB_MISC, ("get_ticks ()=%ld", ret));
  184.     return ret;
  185.   }
  186. ! 
  187.   
  188.   /* Record one -e, -E, -f or -F option in `filters', and check for conflicts.
  189.      All these options are recorded there for processing later
  190. --- 2486,2492 ----
  191.     PRINT_OBNOXIOUS_DEBUG_MESSAGE (DB_MISC, ("get_ticks ()=%ld", ret));
  192.     return ret;
  193.   }
  194. ! #endif /* not HAVE_SETITIMER */
  195.   
  196.   /* Record one -e, -E, -f or -F option in `filters', and check for conflicts.
  197.      All these options are recorded there for processing later
  198.